﻿''' <summary>
''' 标题信息类
''' </summary>
''' <remarks></remarks>
<Serializable()> Public Class ReconnaissanceTitleData
    Implements ICloneable

    ''' <summary>
    ''' 全部的标题字符串 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_sumString As String
    ''' <summary>
    ''' 上面的字符串 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_top As String
    ''' <summary>
    ''' 底下的字符串 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_bottom As String
    ''' <summary>
    ''' 地面高程数据 (Double)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_terraHeight As Double
    ''' <summary>
    ''' 时区 (Double)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_TimeZone As Double

    ''' <summary>
    ''' 站台编号 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_weatherID As String = 14735
    ''' <summary>
    ''' 气象站名称 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_weatherName As String
    ''' <summary>
    ''' 开始日期 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_startTime As String
    ''' <summary>
    ''' 结束日期 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_endTime As String
    ''' <summary>
    ''' 纬度 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_latitude As String = "N"
    ''' <summary>
    ''' 经度 (String)
    ''' </summary>
    ''' <remarks></remarks>
    Private m_longitude As String = "E"


    ''' <summary>
    ''' 时差修正
    ''' </summary>
    ''' <remarks></remarks>
    Private m_TimeModify As Integer


    ''' <summary>
    ''' 站台编号 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property WeatherID() As String
        Get
            Return Me.m_weatherID
        End Get
        Set(ByVal value As String)
            Me.m_weatherID = value
        End Set
    End Property
    ''' <summary>
    ''' 气象站名称 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property WeatherName() As String
        Get
            Return Me.m_weatherName
        End Get
        Set(ByVal value As String)
            Me.m_weatherName = value
        End Set
    End Property


    ''' <summary>
    ''' 开始日期 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property StartTime() As String
        Get
            Return Me.m_startTime
        End Get
        Set(ByVal value As String)
            Me.m_startTime = value
        End Set
    End Property
    ''' <summary>
    ''' 结束日期 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property EndTime() As String
        Get
            Return Me.m_endTime
        End Get
        Set(ByVal value As String)
            Me.m_endTime = value
        End Set
    End Property
    ''' <summary>
    ''' 纬度 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Latitude() As String
        Get
            Return Me.m_latitude
        End Get
        Set(ByVal value As String)
            Me.m_latitude = value
        End Set
    End Property
    ''' <summary>
    '''  经度 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Longitude() As String
        Get
            Return Me.m_longitude
        End Get
        Set(ByVal value As String)
            Me.m_longitude = value
        End Set
    End Property
    ''' <summary>
    ''' 上面的字符串 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Top() As String
        Get
            Return Me.m_top
        End Get
        Set(ByVal value As String)
            Me.m_top = value
        End Set
    End Property
    ''' <summary>
    ''' 底下的字符串 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property Bottom() As String
        Get
            Return Me.m_bottom
        End Get
        Set(ByVal value As String)
            Me.m_bottom = value
        End Set
    End Property
    ''' <summary>
    ''' 全部的标题字符串 (String)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property SumString() As String
        Get
            Return Me.m_sumString
        End Get
        Set(ByVal value As String)
            Me.m_sumString = value
        End Set
    End Property
    ''' <summary>
    ''' 地面高程数据 (Double)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property TerraHeight() As Double
        Get
            Return Me.m_terraHeight
        End Get
        Set(ByVal value As Double)
            Me.m_terraHeight = value
        End Set
    End Property
    ''' <summary>
    ''' 时区 (Double)
    ''' </summary>
    ''' <value></value>
    ''' <returns></returns>
    ''' <remarks></remarks>
    Property TimeZone() As Double
        Get
            Return Me.m_TimeZone
        End Get
        Set(ByVal value As Double)
            Me.m_TimeZone = value
        End Set
    End Property
    ''' <summary>
    ''' 时差修正
    ''' </summary>
    ''' <remarks></remarks>
    Property TimeModify As Integer
        Get
            Return Me.m_TimeModify
        End Get
        Set(ByVal value As Integer)
            Me.m_TimeModify = value
        End Set
    End Property
    Public Function Clone() As Object Implements System.ICloneable.Clone
        Dim objCopy As New ReconnaissanceTitleData
        objCopy.m_sumString = Me.m_sumString
        objCopy.m_top = Me.m_top
        objCopy.m_bottom = Me.m_bottom
        objCopy.m_terraHeight = Me.m_terraHeight
        objCopy.m_TimeZone = Me.m_TimeZone
        objCopy.m_weatherID = Me.m_weatherID
        objCopy.m_weatherName = Me.m_weatherName
        objCopy.m_startTime = Me.m_startTime
        objCopy.m_endTime = Me.m_endTime
        objCopy.m_latitude = Me.m_latitude
        objCopy.m_longitude = Me.m_longitude
        objCopy.m_TimeModify = Me.m_TimeModify
        Return objCopy

    End Function
End Class
